home *** CD-ROM | disk | FTP | other *** search
/ PC Home 48 / Fun Clicp Art 5000.iso / r / mbm / 00881_TH-IN 1.ls < prev    next >
Encoding:
Text File  |  1996-05-11  |  394 b   |  14 lines
  1. on enterFrame
  2.   global gMaxBoutons, gThLabel, g1erSprLoc, gBarChron, g1erSprChr, gChapAct, gCDpath, gVersion
  3.   curseur(6)
  4.   repeat with i = g1erSprChr to gMaxBoutons
  5.     puppetSprite(i, 0)
  6.   end repeat
  7.   set the fileName of cast "FICHE TH1" to gVersion & "PT0.PIC"
  8.   set gMaxBoutons to 37
  9.   set g1erSprLoc to 21
  10.   set gThLabel to "TH:RN"
  11.   set gChapAct to "TH"
  12.   gBarChron(fleche, 0, 1, 2)
  13. end
  14.